home *** CD-ROM | disk | FTP | other *** search
- #ifndef PRAGMAS_AMIGAGUIDE_PRAGMAS_H
- #define PRAGMAS_AMIGAGUIDE_PRAGMAS_H
-
- /*
- ** $VER: amigaguide_pragmas.h 39.4 (17.6.1993)
- ** Includes Release 44.1
- **
- ** Direct ROM interface (pragma) definitions.
- **
- ** Copyright © 1999 Amiga, Inc.
- ** All Rights Reserved
- */
-
- #if defined(LATTICE) || defined(__SASC) || defined(_DCC)
- #ifndef __CLIB_PRAGMA_LIBCALL
- #define __CLIB_PRAGMA_LIBCALL
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #else /* __MAXON__, __STORM__ or AZTEC_C */
- #ifndef __CLIB_PRAGMA_AMICALL
- #define __CLIB_PRAGMA_AMICALL
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* */
-
- #if defined(__SASC) || defined(__STORM__)
- #ifndef __CLIB_PRAGMA_TAGCALL
- #define __CLIB_PRAGMA_TAGCALL
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #endif /* __MAXON__, __STORM__ or AZTEC_C */
-
- #ifndef CLIB_AMIGAGUIDE_PROTOS_H
- #include <clib/amigaguide_protos.h>
- #endif /* CLIB_AMIGAGUIDE_PROTOS_H */
-
- /*--- functions in V40 or higher (Release 3.1) ---*/
-
- /* Public entries */
-
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase LockAmigaGuideBase 24 801
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x24, LockAmigaGuideBase(a0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase UnlockAmigaGuideBase 2a 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x2a, UnlockAmigaGuideBase(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase OpenAmigaGuideA 36 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x36, OpenAmigaGuideA(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase OpenAmigaGuide 36 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x36, OpenAmigaGuide(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase OpenAmigaGuideAsyncA 3c 0802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x3c, OpenAmigaGuideAsyncA(a0,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase OpenAmigaGuideAsync 3c 0802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x3c, OpenAmigaGuideAsync(a0,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase CloseAmigaGuide 42 801
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x42, CloseAmigaGuide(a0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase AmigaGuideSignal 48 801
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x48, AmigaGuideSignal(a0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase GetAmigaGuideMsg 4e 801
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x4e, GetAmigaGuideMsg(a0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase ReplyAmigaGuideMsg 54 801
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x54, ReplyAmigaGuideMsg(a0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase SetAmigaGuideContextA 5a 10803
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x5a, SetAmigaGuideContextA(a0,d0,d1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase SetAmigaGuideContext 5a 10803
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x5a, SetAmigaGuideContext(a0,d0,d1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase SendAmigaGuideContextA 60 0802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x60, SendAmigaGuideContextA(a0,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase SendAmigaGuideContext 60 0802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x60, SendAmigaGuideContext(a0,d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase SendAmigaGuideCmdA 66 10803
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x66, SendAmigaGuideCmdA(a0,d0,d1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase SendAmigaGuideCmd 66 10803
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x66, SendAmigaGuideCmd(a0,d0,d1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase SetAmigaGuideAttrsA 6c 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x6c, SetAmigaGuideAttrsA(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase SetAmigaGuideAttrs 6c 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x6c, SetAmigaGuideAttrs(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase GetAmigaGuideAttr 72 98003
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x72, GetAmigaGuideAttr(d0,a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase LoadXRef 7e 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x7e, LoadXRef(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase ExpungeXRef 84 00
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x84, ExpungeXRef())
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase AddAmigaGuideHostA 8a 90803
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x8a, AddAmigaGuideHostA(a0,d0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase AddAmigaGuideHost 8a 90803
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x8a, AddAmigaGuideHost(a0,d0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase RemoveAmigaGuideHostA 90 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0x90, RemoveAmigaGuideHostA(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #ifdef __CLIB_PRAGMA_TAGCALL
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma tagcall AmigaGuideBase RemoveAmigaGuideHost 90 9802
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma tagcall(AmigaGuideBase, 0x90, RemoveAmigaGuideHost(a0,a1))
- #endif /* __CLIB_PRAGMA_AMICALL */
- #endif /* __CLIB_PRAGMA_TAGCALL */
- #ifdef __CLIB_PRAGMA_LIBCALL
- #pragma libcall AmigaGuideBase GetAmigaGuideString d2 001
- #endif /* __CLIB_PRAGMA_LIBCALL */
- #ifdef __CLIB_PRAGMA_AMICALL
- #pragma amicall(AmigaGuideBase, 0xd2, GetAmigaGuideString(d0))
- #endif /* __CLIB_PRAGMA_AMICALL */
-
- #endif /* PRAGMAS_AMIGAGUIDE_PRAGMAS_H */
-